ShareWare OnLine 2/ShareWare OnLine Volume 2 (CMS Software)(1993).iso/truetype/amifind.zip/ADDFINDR.SMM

INI File | 1993-06-12 | 4KB | 422 lines

[ver]
    4
[sty]

[files]
[charset]
    82
    ANSI (Windows, IBM CP 1252)
[revisions]
    0
[prn]
    HP LaserJet IIP
[port]
    LPT1:
[lang]
    1
[desc]
    This macro file contains routines for loading AmiFind and for adding AmiFind to Ami Pro's File menu.




    739916723
    2
    739910645
    19
    1
    0
    0
    0
    0






    1
[fopts]
    0
    1
    0
    0
[lnopts]
    2
    Body Text
    1
[docopts]
    5
    2
[GramStyle]

[tag]
    Body Text
    2
    [fnt]
        Arial
        240
        0
        16384
    [algn]
        1
        1
        216
        0
        0
    [spc]
        33
        273
        1
        0
        0
        1
        100
    [brk]
        4
    [line]
        8
        0
        1
        0
        1
        1
        1
        10
        10
        1
    [spec]
        0
        0

        0
        1
        1
        0
        16
        0
        0
    [nfmt]
        272
        1
        3
        .
        ,
        $
    Body Text
    0
    0
[tag]
    Body Single
    3
    [fnt]
        Times New Roman
        240
        0
        49152
    [algn]
        1
        1
        0
        0
        0
    [spc]
        33
        273
        1
        0
        0
        1
        100
    [brk]
        4
    [line]
        8
        0
        1
        0
        1
        1
        1
        10
        10
        1
    [spec]
        0
        0

        0
        1
        1
        0
        0
        0
        0
    [nfmt]
        280
        1
        2
        .
        ,
        $
    Body Single
    0
    0
[tag]
    Function
    4
    [fnt]
        Arial
        240
        0
        16385
    [algn]
        1
        1
        0
        0
        0
    [spc]
        33
        244
        1
        0
        0
        1
        100
    [brk]
        68
    [line]
        8
        0
        1
        0
        1
        1
        1
        10
        10
        1
    [spec]
        0
        1

        0
        1
        1
        0
        0
        0
        0
    [nfmt]
        272
        1
        3
        .
        ,
        $
    Body Text
    0
    0
[lay]
    Standard
    513
    [rght]
        15840
        12240
        1
        1440
        1440
        1
        1440
        1440
        0
        1
        0
        1
        0
        2
        1
        1440
        10800
        12
        1
        720
        1
        1440
        1
        2160
        1
        2880
        1
        3600
        1
        4320
        1
        5040
        1
        5760
        1
        6480
        1
        7200
        1
        7920
        1
        8640
    [hrght]
    [lyfrm]
        1
        11200
        0
        0
        12240
        1440
        0
        1
        3
        1 0 0 0 0 0 0
        0
        0
        1
    [frmlay]
        1440
        12240
        1
        1440
        72
        1
        792
        1440
        0
        1
        0
        1
        1
        0
        1
        1440
        10800
        1
        3
        9360
    [txt]
>
    [frght]
    [lyfrm]
        1
        13248
        0
        14400
        12240
        15840
        0
        1
        3
        1 0 0 0 0 0 0
        0
        0
        2
    [frmlay]
        15840
        12240
        1
        1440
        792
        1
        14472
        1440
        0
        1
        0
        1
        1
        0
        1
        1440
        10800
        2
        2
        4680
        3
        9360
    [txt]
>
[elay]
[l1]
    0
[pg]
    1
    17 0 12 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
[edoc]
<:#568,9360><:f,2Times New Roman,>The following macro adds the LoadFinder macro (below) to the File menu.  It then calls your original Program Load macro, if you had one when AmiFind Installer was run.

<:#284,9360>

<:#284,9360>Function AddFinder ()

<:#284,9360>ThisFile=GetRunningMacroFile$()

InsertMenuItem (1, "&File", 11, "A&miFind...", "{ThisFile}!LoadFinder()", "Load AmiFind- find lost files by filename, description, keywords, date, or contents")

<:#284,9360>OldAutoExec=GetProfileString$ ("AmiFind", "Old Program Load Macro")

<:#284,9360>IF OldAutoExec<<<;>"" then

<:#284,9360>  CALLI OldAutoExec ()

<:#284,9360>ENDIF

<:#284,9360>End Function

<:#284,9360>

<:#284,9360><:f,2Times New Roman,>The following macro runs AmiFind.<:f>

<:#284,9360>

<:#284,9360>Function LoadFinder ()

<:#284,9360>AmiFindPath=GetProfileString$ ("AmiFind", "AmiFindPath")

<:#284,9360>trash=Exec (AmiFindPath, "")

<:#284,9360>End Function

>

[Embedded]
00003403
>
[macsum] 2
AddFinder 0 0 3 2
LoadFinder 272 0 3 13
[macse]
14 AddFinder
0 802
13
8 1
0 527 1 "&File" 11 "A&miFind..." "{1}!LoadFinder()" "Load AmiFind- find lost files by filename, description, keywords, date, or contents"
0 286 "AmiFind" "Old Program Load Macro"
13
8 2
6 2
7 ""
18 1
11 00000260
16 "{2}"
6 0
15
9
14 LoadFinder
0 286 "AmiFind" "AmiFindPath"
13
8 1
0 22 "{1}" ""
13
8 2
6 0
15
9
00003428